home *** CD-ROM | disk | FTP | other *** search
/ ROM Magic / ROM Magic.iso / pc / 12_dorei / winprog / movie.dxr / 00050_MovieCnt,up.ls < prev    next >
Encoding:
Text File  |  1995-05-12  |  546 b   |  24 lines
  1. on mouseDown
  2.   global packagefr, status, contstatus, packageorvideo
  3.   if status <> EMPTY then
  4.     if the puppet of sprite 20 = 1 then
  5.       beepsound("Warning")
  6.       exit
  7.     end if
  8.   end if
  9.   eracemenudownbutton()
  10.   eyeon()
  11.   if button3() then
  12.     if the type of sprite 15 = 16 then
  13.       if the movieTime of sprite 15 = the startTime of sprite 15 then
  14.         set the movieTime of sprite 15 to 1
  15.       end if
  16.       stopqt()
  17.     end if
  18.     set packageorvideo to "package"
  19.     photoview(0)
  20.     go(packagefr)
  21.   end if
  22.   eracemenudownbutton()
  23. end
  24.